home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Windows News 2005 November
/
WNnov2005.iso
/
Windows
/
Indispensables
/
Movie Collection
/
MovieCollection5403.exe
/
{app}
/
MovieCollection.exe
/
0
/
RCDATA
/
TFRMINFO
/
TFRMINFO.txt
Wrap
Text File
|
2005-08-08
|
4KB
|
146 lines
inherited FrmInfo: TFrmInfo
Left = 317
Top = 115
Width = 707
Height = 631
HelpContext = 1040
Caption = 'FrmInfo'
OldCreateOrder = True
PixelsPerInch = 96
TextHeight = 13
inherited sb: TTBXStatusBar
Top = 578
Width = 699
end
object cxGrid: TcxGrid [1]
Left = 0
Top = 0
Width = 699
Height = 578
Align = alClient
TabOrder = 1
object cxGridDBTableView: TcxGridDBTableView
NavigatorButtons.ConfirmDelete = False
OnCellClick = cxGridDBTableViewCellClick
DataController.DataSource = dsMemData
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
OptionsCustomize.ColumnFiltering = False
OptionsCustomize.ColumnHiding = True
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsData.Editing = False
OptionsData.Inserting = False
OptionsView.ColumnAutoWidth = True
OptionsView.GroupByBox = False
OptionsView.Header = False
Styles.StyleSheet = dtmSession.cxGridTableViewStyleSheet
OnCustomDrawGroupCell = cxGridDBTableViewCustomDrawGroupCell
object cxGridDBTableViewRecId: TcxGridDBColumn
DataBinding.FieldName = 'RecId'
Visible = False
end
object cxGridDBTableViewgroupe: TcxGridDBColumn
DataBinding.FieldName = 'groupe'
Visible = False
GroupIndex = 0
SortIndex = 0
SortOrder = soAscending
Width = 74
end
object cxGridDBTableViewcode: TcxGridDBColumn
DataBinding.FieldName = 'code'
OnCustomDrawCell = cxGridDBTableViewcodeCustomDrawCell
Width = 70
end
object cxGridDBTableViewvalue: TcxGridDBColumn
DataBinding.FieldName = 'value'
Width = 165
end
object cxGridDBTableViewcodeloc: TcxGridDBColumn
DataBinding.FieldName = 'codeloc'
Visible = False
Width = 61
end
object cxGridDBTableViewcodeemprunteur: TcxGridDBColumn
DataBinding.FieldName = 'codeemprunteur'
Visible = False
Width = 61
end
object cxGridDBTableViewcodefilm: TcxGridDBColumn
DataBinding.FieldName = 'codefilm'
Visible = False
Width = 66
end
object cxGridDBTableViewnomfilm: TcxGridDBColumn
DataBinding.FieldName = 'nomfilm'
Visible = False
end
end
object cxGridLevel: TcxGridLevel
GridView = cxGridDBTableView
end
end
inherited aclFiche: TActionList
Left = 48
Top = 112
object ActionRecupFilm: TAction [0]
Caption = 'R'#233'cup'#233'rer Film'
ImageIndex = 3
OnExecute = ActionRecupFilmExecute
end
end
object PopupMenu: TPopupMenu
Images = ImageListSmall
Left = 272
Top = 248
object Action11: TMenuItem
Action = ActionRecupFilm
end
end
object dxMemData: TdxMemData
Indexes = <>
SortOptions = []
Left = 488
Top = 88
object dxMemDatagroupe: TStringField
FieldName = 'groupe'
Size = 150
end
object dxMemDatacode: TStringField
FieldName = 'code'
Size = 300
end
object dxMemDatavalue: TStringField
FieldName = 'value'
Size = 300
end
object dxMemDatacodeloc: TIntegerField
FieldName = 'codeloc'
end
object dxMemDatacodeemprunteur: TIntegerField
FieldName = 'codeemprunteur'
end
object dxMemDatacodefilm: TIntegerField
FieldName = 'codefilm'
end
object dxMemDatanomfilm: TStringField
FieldName = 'nomfilm'
Size = 255
end
end
object dsMemData: TDataSource
DataSet = dxMemData
Left = 408
Top = 144
end
object TBXPopupMenu: TTBXPopupMenu
Left = 424
Top = 240
object TBXItem2: TTBXItem
Action = ActionRecupFilm
end
end
end